/ Mac Power 1997 January / macpower199701.bin / AMUG / Programming_10 / ICPAppSource+ICprogKit / ICAppSourceKit 1.3.sit / ICAppSourceKit1.3 / ICIconSuites.p

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 49 43 49 63 6f 6e | 53 75 69 74 65 73 2e 70 |..ICIcon|Suites.p|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 15 ad 00 | 00 01 9a ac c5 27 c2 ac |........|.....'..|
|00000060| c5 27 c2 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.'......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 92 43 00 00 |........|.....C..|
|00000080| 75 6e 69 74 20 49 43 49 | 63 6f 6e 53 75 69 74 65 |unit ICI|conSuite|
|00000090| 73 3b 0d 0d 69 6e 74 65 | 72 66 61 63 65 0d 0d 09 |s;..inte|rface...|
|000000a0| 75 73 65 73 0d 09 09 54 | 79 70 65 73 3b 0d 09 09 |uses...T|ypes;...|
|000000b0| 0d 09 70 72 6f 63 65 64 | 75 72 65 20 49 6e 69 74 |..proced|ure Init|
|000000c0| 49 43 49 63 6f 6e 53 75 | 69 74 65 73 3b 0d 09 66 |ICIconSu|ites;..f|
|000000d0| 75 6e 63 74 69 6f 6e 20 | 47 65 74 44 54 44 42 49 |unction |GetDTDBI|
|000000e0| 63 6f 6e 53 75 69 74 65 | 43 61 63 68 65 64 20 28 |conSuite|Cached (|
|000000f0| 66 74 79 70 65 2c 20 66 | 63 72 65 61 74 6f 72 3a |ftype, f|creator:|
|00000100| 20 4f 53 54 79 70 65 3b | 20 76 61 72 20 73 75 69 | OSType;| var sui|
|00000110| 74 65 3a 20 48 61 6e 64 | 6c 65 29 3a 20 4f 53 45 |te: Hand|le): OSE|
|00000120| 72 72 3b 0d 0d 69 6d 70 | 6c 65 6d 65 6e 74 61 74 |rr;..imp|lementat|
|00000130| 69 6f 6e 0d 0d 09 75 73 | 65 73 0d 09 09 46 69 6c |ion...us|es...Fil|
|00000140| 65 73 2c 20 45 72 72 6f | 72 73 2c 20 49 43 47 6c |es, Erro|rs, ICGl|
|00000150| 6f 62 61 6c 73 2c 20 49 | 43 4d 69 73 63 53 75 62 |obals, I|CMiscSub|
|00000160| 73 2c 20 49 63 6f 6e 73 | 3b 0d 0d 09 66 75 6e 63 |s, Icons|;...func|
|00000170| 74 69 6f 6e 20 47 65 74 | 44 54 44 42 49 63 6f 6e |tion Get|DTDBIcon|
|00000180| 20 28 66 74 79 70 65 2c | 20 66 63 72 65 61 74 6f | (ftype,| fcreato|
|00000190| 72 3a 20 4f 53 54 79 70 | 65 3b 20 76 61 72 20 63 |r: OSTyp|e; var c|
|000001a0| 6f 6f 6b 69 65 3a 20 69 | 6e 74 65 67 65 72 3b 20 |ookie: i|nteger; |
|000001b0| 69 63 6f 6e 5f 74 6f 5f | 67 65 74 3a 20 53 69 67 |icon_to_|get: Sig|
|000001c0| 6e 65 64 42 79 74 65 3b | 20 76 61 72 20 70 62 64 |nedByte;| var pbd|
|000001d0| 74 3a 20 44 54 50 42 52 | 65 63 29 3a 20 4f 53 45 |t: DTPBR|ec): OSE|
|000001e0| 72 72 3b 0d 09 09 66 75 | 6e 63 74 69 6f 6e 20 47 |rr;...fu|nction G|
|000001f0| 65 74 54 68 65 49 63 6f | 6e 20 28 64 74 72 6e 3a |etTheIco|n (dtrn:|
|00000200| 20 69 6e 74 65 67 65 72 | 29 3a 20 62 6f 6f 6c 65 | integer|): boole|
|00000210| 61 6e 3b 0d 09 09 62 65 | 67 69 6e 0d 09 09 09 70 |an;...be|gin....p|
|00000220| 62 64 74 2e 69 6f 44 54 | 52 65 66 4e 75 6d 20 3a |bdt.ioDT|RefNum :|
|00000230| 3d 20 64 74 72 6e 3b 0d | 09 09 09 70 62 64 74 2e |= dtrn;.|...pbdt.|
|00000240| 69 6f 54 61 67 49 6e 66 | 6f 20 3a 3d 20 30 3b 0d |ioTagInf|o := 0;.|
|00000250| 09 09 09 70 62 64 74 2e | 69 6f 49 63 6f 6e 54 79 |...pbdt.|ioIconTy|
|00000260| 70 65 20 3a 3d 20 69 63 | 6f 6e 5f 74 6f 5f 67 65 |pe := ic|on_to_ge|
|00000270| 74 3b 0d 09 09 09 70 62 | 64 74 2e 69 6f 46 69 6c |t;....pb|dt.ioFil|
|00000280| 65 43 72 65 61 74 6f 72 | 20 3a 3d 20 66 63 72 65 |eCreator| := fcre|
|00000290| 61 74 6f 72 3b 0d 09 09 | 09 70 62 64 74 2e 69 6f |ator;...|.pbdt.io|
|000002a0| 46 69 6c 65 54 79 70 65 | 20 3a 3d 20 66 74 79 70 |FileType| := ftyp|
|000002b0| 65 3b 0d 09 09 09 47 65 | 74 54 68 65 49 63 6f 6e |e;....Ge|tTheIcon|
|000002c0| 20 3a 3d 20 50 42 44 54 | 47 65 74 49 63 6f 6e 53 | := PBDT|GetIconS|
|000002d0| 79 6e 63 28 40 70 62 64 | 74 29 20 3d 20 6e 6f 45 |ync(@pbd|t) = noE|
|000002e0| 72 72 3b 0d 09 09 65 6e | 64 3b 0d 0d 09 09 76 61 |rr;...en|d;....va|
|000002f0| 72 0d 09 09 09 6f 65 3a | 20 4f 53 45 72 72 3b 0d |r....oe:| OSErr;.|
|00000300| 09 09 09 69 3a 20 69 6e | 74 65 67 65 72 3b 0d 09 |...i: in|teger;..|
|00000310| 09 09 66 6f 75 6e 64 3a | 20 62 6f 6f 6c 65 61 6e |..found:| boolean|
|00000320| 3b 0d 09 09 09 6a 75 6e | 6b 73 74 72 3a 20 53 74 |;....jun|kstr: St|
|00000330| 72 36 33 3b 0d 09 09 09 | 76 72 65 66 6e 75 6d 3a |r63;....|vrefnum:|
|00000340| 20 4f 53 45 72 72 3b 0d | 09 09 09 63 72 64 61 74 | OSErr;.|...crdat|
|00000350| 65 3a 20 6c 6f 6e 67 69 | 6e 74 3b 0d 09 62 65 67 |e: longi|nt;..beg|
|00000360| 69 6e 0d 09 09 66 6f 75 | 6e 64 20 3a 3d 20 66 61 |in...fou|nd := fa|
|00000370| 6c 73 65 3b 0d 09 09 69 | 66 20 73 79 73 74 65 6d |lse;...i|f system|
|00000380| 37 20 74 68 65 6e 20 62 | 65 67 69 6e 0d 09 09 09 |7 then b|egin....|
|00000390| 69 66 20 63 6f 6f 6b 69 | 65 20 3d 20 30 20 74 68 |if cooki|e = 0 th|
|000003a0| 65 6e 20 62 65 67 69 6e | 0d 09 09 09 09 69 20 3a |en begin|.....i :|
|000003b0| 3d 20 31 3b 0d 09 09 09 | 09 72 65 70 65 61 74 0d |= 1;....|.repeat.|
|000003c0| 09 09 09 09 09 76 72 65 | 66 6e 75 6d 20 3a 3d 20 |.....vre|fnum := |
|000003d0| 30 3b 0d 09 09 09 09 09 | 6a 75 6e 6b 73 74 72 20 |0;......|junkstr |
|000003e0| 3a 3d 20 27 27 3b 0d 09 | 09 09 09 09 6f 65 20 3a |:= '';..|....oe :|
|000003f0| 3d 20 47 65 74 56 6f 6c | 49 6e 66 6f 28 6a 75 6e |= GetVol|Info(jun|
|00000400| 6b 73 74 72 2c 20 76 72 | 65 66 6e 75 6d 2c 20 69 |kstr, vr|efnum, i|
|00000410| 2c 20 63 72 64 61 74 65 | 29 3b 0d 09 09 09 09 09 |, crdate|);......|
|00000420| 69 20 3a 3d 20 69 20 2b | 20 31 3b 0d 09 09 09 09 |i := i +| 1;.....|
|00000430| 09 69 66 20 6f 65 20 3d | 20 6e 6f 45 72 72 20 74 |.if oe =| noErr t|
|00000440| 68 65 6e 20 62 65 67 69 | 6e 0d 09 09 09 09 09 09 |hen begi|n.......|
|00000450| 77 69 74 68 20 70 62 64 | 74 20 64 6f 20 62 65 67 |with pbd|t do beg|
|00000460| 69 6e 0d 09 09 09 09 09 | 09 09 69 6f 4e 61 6d 65 |in......|..ioName|
|00000470| 50 74 72 20 3a 3d 20 6e | 69 6c 3b 0d 09 09 09 09 |Ptr := n|il;.....|
|00000480| 09 09 09 69 6f 56 52 65 | 66 4e 75 6d 20 3a 3d 20 |...ioVRe|fNum := |
|00000490| 76 72 65 66 6e 75 6d 3b | 0d 09 09 09 09 09 09 09 |vrefnum;|........|
|000004a0| 6f 65 20 3a 3d 20 50 42 | 44 54 47 65 74 50 61 74 |oe := PB|DTGetPat|
|000004b0| 68 28 40 70 62 64 74 29 | 3b 0d 09 09 09 09 09 09 |h(@pbdt)|;.......|
|000004c0| 09 69 66 20 6f 65 20 3d | 20 6e 6f 45 72 72 20 74 |.if oe =| noErr t|
|000004d0| 68 65 6e 20 62 65 67 69 | 6e 0d 09 09 09 09 09 09 |hen begi|n.......|
|000004e0| 09 09 69 66 20 47 65 74 | 54 68 65 49 63 6f 6e 28 |..if Get|TheIcon(|
|000004f0| 70 62 64 74 2e 69 6f 44 | 54 52 65 66 4e 75 6d 29 |pbdt.ioD|TRefNum)|
|00000500| 20 74 68 65 6e 20 62 65 | 67 69 6e 0d 09 09 09 09 | then be|gin.....|
|00000510| 09 09 09 09 09 63 6f 6f | 6b 69 65 20 3a 3d 20 70 |.....coo|kie := p|
|00000520| 62 64 74 2e 69 6f 44 54 | 52 65 66 4e 75 6d 3b 0d |bdt.ioDT|RefNum;.|
|00000530| 09 09 09 09 09 09 09 09 | 09 66 6f 75 6e 64 20 3a |........|.found :|
|00000540| 3d 20 74 72 75 65 3b 0d | 09 09 09 09 09 09 09 09 |= true;.|........|
|00000550| 65 6e 64 3b 0d 09 09 09 | 09 09 09 09 65 6e 64 3b |end;....|....end;|
|00000560| 0d 09 09 09 09 09 09 65 | 6e 64 3b 0d 09 09 09 09 |.......e|nd;.....|
|00000570| 09 09 6f 65 20 3a 3d 20 | 6e 6f 45 72 72 3b 0d 09 |..oe := |noErr;..|
|00000580| 09 09 09 09 65 6e 64 3b | 0d 09 09 09 09 75 6e 74 |....end;|.....unt|
|00000590| 69 6c 20 66 6f 75 6e 64 | 20 6f 72 20 28 6f 65 20 |il found| or (oe |
|000005a0| 3c 3e 20 6e 6f 45 72 72 | 29 3b 0d 09 09 09 65 6e |<> noErr|);....en|
|000005b0| 64 20 65 6c 73 65 20 62 | 65 67 69 6e 0d 09 09 09 |d else b|egin....|
|000005c0| 09 66 6f 75 6e 64 20 3a | 3d 20 47 65 74 54 68 65 |.found :|= GetThe|
|000005d0| 49 63 6f 6e 28 63 6f 6f | 6b 69 65 29 3b 0d 09 09 |Icon(coo|kie);...|
|000005e0| 09 65 6e 64 3b 0d 09 09 | 65 6e 64 3b 0d 09 09 69 |.end;...|end;...i|
|000005f0| 66 20 66 6f 75 6e 64 20 | 74 68 65 6e 20 62 65 67 |f found |then beg|
|00000600| 69 6e 0d 09 09 09 6f 65 | 20 3a 3d 20 6e 6f 45 72 |in....oe| := noEr|
|00000610| 72 3b 0d 09 09 65 6e 64 | 20 65 6c 73 65 20 62 65 |r;...end| else be|
|00000620| 67 69 6e 0d 09 09 09 6f | 65 20 3a 3d 20 61 66 70 |gin....o|e := afp|
|00000630| 49 74 65 6d 4e 6f 74 46 | 6f 75 6e 64 3b 0d 09 09 |ItemNotF|ound;...|
|00000640| 65 6e 64 3b 0d 09 09 47 | 65 74 44 54 44 42 49 63 |end;...G|etDTDBIc|
|00000650| 6f 6e 20 3a 3d 20 6f 65 | 3b 0d 09 65 6e 64 3b 20 |on := oe|;..end; |
|00000660| 28 2a 20 47 65 74 44 54 | 44 42 49 63 6f 6e 20 2a |(* GetDT|DBIcon *|
|00000670| 29 0d 0d 09 76 61 72 0d | 09 09 69 63 6f 6e 5f 62 |)...var.|..icon_b|
|00000680| 75 66 66 65 72 3a 20 70 | 61 63 6b 65 64 20 61 72 |uffer: p|acked ar|
|00000690| 72 61 79 5b 30 2e 2e 31 | 30 32 33 5d 20 6f 66 20 |ray[0..1|023] of |
|000006a0| 62 79 74 65 3b 0d 0d 09 | 66 75 6e 63 74 69 6f 6e |byte;...|function|
|000006b0| 20 47 65 74 44 54 44 42 | 49 63 6f 6e 48 20 28 66 | GetDTDB|IconH (f|
|000006c0| 74 79 70 65 2c 20 66 63 | 72 65 61 74 6f 72 3a 20 |type, fc|reator: |
|000006d0| 4f 53 54 79 70 65 3b 20 | 76 61 72 20 63 6f 6f 6b |OSType; |var cook|
|000006e0| 69 65 3a 20 69 6e 74 65 | 67 65 72 3b 20 69 63 6f |ie: inte|ger; ico|
|000006f0| 6e 5f 74 6f 5f 67 65 74 | 3a 20 53 69 67 6e 65 64 |n_to_get|: Signed|
|00000700| 42 79 74 65 3b 20 76 61 | 72 20 69 63 6f 6e 68 3a |Byte; va|r iconh:|
|00000710| 20 48 61 6e 64 6c 65 29 | 3a 20 4f 53 45 72 72 3b | Handle)|: OSErr;|
|00000720| 0d 09 09 76 61 72 0d 09 | 09 09 64 74 70 62 3a 20 |...var..|..dtpb: |
|00000730| 44 54 50 42 52 65 63 3b | 0d 09 09 09 65 72 72 3a |DTPBRec;|....err:|
|00000740| 20 4f 53 45 72 72 3b 0d | 09 62 65 67 69 6e 0d 09 | OSErr;.|.begin..|
|00000750| 09 69 63 6f 6e 68 20 3a | 3d 20 6e 69 6c 3b 0d 09 |.iconh :|= nil;..|
|00000760| 09 64 74 70 62 2e 69 6f | 44 54 42 75 66 66 65 72 |.dtpb.io|DTBuffer|
|00000770| 20 3a 3d 20 40 69 63 6f | 6e 5f 62 75 66 66 65 72 | := @ico|n_buffer|
|00000780| 3b 0d 09 09 64 74 70 62 | 2e 69 6f 44 54 52 65 71 |;...dtpb|.ioDTReq|
|00000790| 43 6f 75 6e 74 20 3a 3d | 20 73 69 7a 65 6f 66 28 |Count :=| sizeof(|
|000007a0| 69 63 6f 6e 5f 62 75 66 | 66 65 72 29 3b 0d 09 09 |icon_buf|fer);...|
|000007b0| 65 72 72 20 3a 3d 20 47 | 65 74 44 54 44 42 49 63 |err := G|etDTDBIc|
|000007c0| 6f 6e 28 66 74 79 70 65 | 2c 20 66 63 72 65 61 74 |on(ftype|, fcreat|
|000007d0| 6f 72 2c 20 63 6f 6f 6b | 69 65 2c 20 69 63 6f 6e |or, cook|ie, icon|
|000007e0| 5f 74 6f 5f 67 65 74 2c | 20 64 74 70 62 29 3b 0d |_to_get,| dtpb);.|
|000007f0| 09 09 69 66 20 65 72 72 | 20 3d 20 6e 6f 45 72 72 |..if err| = noErr|
|00000800| 20 74 68 65 6e 20 62 65 | 67 69 6e 0d 09 09 09 65 | then be|gin....e|
|00000810| 72 72 20 3a 3d 20 50 74 | 72 54 6f 48 61 6e 64 28 |rr := Pt|rToHand(|
|00000820| 40 69 63 6f 6e 5f 62 75 | 66 66 65 72 2c 20 69 63 |@icon_bu|ffer, ic|
|00000830| 6f 6e 68 2c 20 64 74 70 | 62 2e 69 6f 44 54 41 63 |onh, dtp|b.ioDTAc|
|00000840| 74 43 6f 75 6e 74 29 3b | 0d 09 09 65 6e 64 3b 20 |tCount);|...end; |
|00000850| 28 2a 20 69 66 20 2a 29 | 0d 09 09 69 66 20 65 72 |(* if *)|...if er|
|00000860| 72 20 3c 3e 20 6e 6f 45 | 72 72 20 74 68 65 6e 20 |r <> noE|rr then |
|00000870| 62 65 67 69 6e 0d 09 09 | 09 44 69 73 70 6f 73 65 |begin...|.Dispose|
|00000880| 48 61 6e 64 6c 65 28 69 | 63 6f 6e 68 29 3b 0d 09 |Handle(i|conh);..|
|00000890| 09 09 69 63 6f 6e 68 20 | 3a 3d 20 6e 69 6c 3b 0d |..iconh |:= nil;.|
|000008a0| 09 09 65 6e 64 3b 20 28 | 2a 20 69 66 20 2a 29 0d |..end; (|* if *).|
|000008b0| 09 09 47 65 74 44 54 44 | 42 49 63 6f 6e 48 20 3a |..GetDTD|BIconH :|
|000008c0| 3d 20 65 72 72 3b 0d 09 | 65 6e 64 3b 20 28 2a 20 |= err;..|end; (* |
|000008d0| 47 65 74 44 54 44 42 49 | 63 6f 6e 48 20 2a 29 0d |GetDTDBI|conH *).|
|000008e0| 0d 09 66 75 6e 63 74 69 | 6f 6e 20 47 65 74 44 54 |..functi|on GetDT|
|000008f0| 44 42 41 64 64 53 75 69 | 74 65 20 28 73 75 69 74 |DBAddSui|te (suit|
|00000900| 65 3a 20 48 61 6e 64 6c | 65 3b 20 66 74 79 70 65 |e: Handl|e; ftype|
|00000910| 2c 20 66 63 72 65 61 74 | 6f 72 3a 20 4f 53 54 79 |, fcreat|or: OSTy|
|00000920| 70 65 3b 20 76 61 72 20 | 63 6f 6f 6b 69 65 3a 20 |pe; var |cookie: |
|00000930| 69 6e 74 65 67 65 72 3b | 20 69 63 6f 6e 5f 74 6f |integer;| icon_to|
|00000940| 5f 67 65 74 3a 20 53 69 | 67 6e 65 64 42 79 74 65 |_get: Si|gnedByte|
|00000950| 3b 20 69 63 6f 6e 5f 74 | 6f 5f 70 75 74 3a 20 4f |; icon_t|o_put: O|
|00000960| 53 54 79 70 65 29 3a 20 | 4f 53 45 72 72 3b 0d 09 |SType): |OSErr;..|
|00000970| 09 76 61 72 0d 09 09 09 | 65 72 72 3a 20 4f 53 45 |.var....|err: OSE|
|00000980| 72 72 3b 0d 09 09 09 69 | 63 6f 6e 68 3a 20 48 61 |rr;....i|conh: Ha|
|00000990| 6e 64 6c 65 3b 0d 09 62 | 65 67 69 6e 0d 09 09 65 |ndle;..b|egin...e|
|000009a0| 72 72 20 3a 3d 20 47 65 | 74 44 54 44 42 49 63 6f |rr := Ge|tDTDBIco|
|000009b0| 6e 48 28 66 74 79 70 65 | 2c 20 66 63 72 65 61 74 |nH(ftype|, fcreat|
|000009c0| 6f 72 2c 20 63 6f 6f 6b | 69 65 2c 20 69 63 6f 6e |or, cook|ie, icon|
|000009d0| 5f 74 6f 5f 67 65 74 2c | 20 69 63 6f 6e 68 29 3b |_to_get,| iconh);|
|000009e0| 0d 09 09 69 66 20 65 72 | 72 20 3d 20 6e 6f 45 72 |...if er|r = noEr|
|000009f0| 72 20 74 68 65 6e 20 62 | 65 67 69 6e 0d 09 09 09 |r then b|egin....|
|00000a00| 65 72 72 20 3a 3d 20 41 | 64 64 49 63 6f 6e 54 6f |err := A|ddIconTo|
|00000a10| 53 75 69 74 65 28 69 63 | 6f 6e 68 2c 20 73 75 69 |Suite(ic|onh, sui|
|00000a20| 74 65 2c 20 69 63 6f 6e | 5f 74 6f 5f 70 75 74 29 |te, icon|_to_put)|
|00000a30| 3b 0d 09 09 65 6e 64 3b | 20 28 2a 20 69 66 20 2a |;...end;| (* if *|
|00000a40| 29 0d 09 09 69 66 20 65 | 72 72 20 3c 3e 20 6e 6f |)...if e|rr <> no|
|00000a50| 45 72 72 20 74 68 65 6e | 20 62 65 67 69 6e 0d 09 |Err then| begin..|
|00000a60| 09 09 44 69 73 70 6f 73 | 65 48 61 6e 64 6c 65 28 |..Dispos|eHandle(|
|00000a70| 69 63 6f 6e 68 29 3b 0d | 09 09 09 69 63 6f 6e 68 |iconh);.|...iconh|
|00000a80| 20 3a 3d 20 6e 69 6c 3b | 0d 09 09 65 6e 64 3b 20 | := nil;|...end; |
|00000a90| 28 2a 20 69 66 20 2a 29 | 0d 09 09 47 65 74 44 54 |(* if *)|...GetDT|
|00000aa0| 44 42 41 64 64 53 75 69 | 74 65 20 3a 3d 20 65 72 |DBAddSui|te := er|
|00000ab0| 72 3b 0d 09 65 6e 64 3b | 20 28 2a 20 47 65 74 44 |r;..end;| (* GetD|
|00000ac0| 54 44 42 41 64 64 53 75 | 69 74 65 20 2a 29 0d 0d |TDBAddSu|ite *)..|
|00000ad0| 09 66 75 6e 63 74 69 6f | 6e 20 47 65 74 44 54 44 |.functio|n GetDTD|
|00000ae0| 42 49 63 6f 6e 53 75 69 | 74 65 55 6e 63 61 63 68 |BIconSui|teUncach|
|00000af0| 65 64 20 28 66 74 79 70 | 65 2c 20 66 63 72 65 61 |ed (ftyp|e, fcrea|
|00000b00| 74 6f 72 3a 20 4f 53 54 | 79 70 65 3b 20 76 61 72 |tor: OST|ype; var|
|00000b10| 20 73 75 69 74 65 3a 20 | 48 61 6e 64 6c 65 29 3a | suite: |Handle):|
|00000b20| 20 4f 53 45 72 72 3b 0d | 09 09 76 61 72 0d 09 09 | OSErr;.|..var...|
|00000b30| 09 65 72 72 3a 20 4f 53 | 45 72 72 3b 0d 09 09 09 |.err: OS|Err;....|
|00000b40| 6a 75 6e 6b 3a 20 4f 53 | 45 72 72 3b 0d 09 09 09 |junk: OS|Err;....|
|00000b50| 63 6f 6f 6b 69 65 3a 20 | 69 6e 74 65 67 65 72 3b |cookie: |integer;|
|00000b60| 0d 09 62 65 67 69 6e 0d | 09 09 73 75 69 74 65 20 |..begin.|..suite |
|00000b70| 3a 3d 20 6e 69 6c 3b 0d | 09 09 65 72 72 20 3a 3d |:= nil;.|..err :=|
|00000b80| 20 4e 65 77 49 63 6f 6e | 53 75 69 74 65 28 73 75 | NewIcon|Suite(su|
|00000b90| 69 74 65 29 3b 0d 09 09 | 69 66 20 65 72 72 20 3d |ite);...|if err =|
|00000ba0| 20 6e 6f 45 72 72 20 74 | 68 65 6e 20 62 65 67 69 | noErr t|hen begi|
|00000bb0| 6e 0d 09 09 09 63 6f 6f | 6b 69 65 20 3a 3d 20 30 |n....coo|kie := 0|
|00000bc0| 3b 0d 09 09 09 69 66 20 | 47 65 74 44 54 44 42 41 |;....if |GetDTDBA|
|00000bd0| 64 64 53 75 69 74 65 28 | 73 75 69 74 65 2c 20 66 |ddSuite(|suite, f|
|00000be0| 74 79 70 65 2c 20 66 63 | 72 65 61 74 6f 72 2c 20 |type, fc|reator, |
|00000bf0| 63 6f 6f 6b 69 65 2c 20 | 6b 4c 61 72 67 65 49 63 |cookie, |kLargeIc|
|00000c00| 6f 6e 2c 20 6c 61 72 67 | 65 31 42 69 74 4d 61 73 |on, larg|e1BitMas|
|00000c10| 6b 29 20 3d 20 6e 6f 45 | 72 72 20 74 68 65 6e 20 |k) = noE|rr then |
|00000c20| 62 65 67 69 6e 0d 09 09 | 09 09 6a 75 6e 6b 20 3a |begin...|..junk :|
|00000c30| 3d 20 47 65 74 44 54 44 | 42 41 64 64 53 75 69 74 |= GetDTD|BAddSuit|
|00000c40| 65 28 73 75 69 74 65 2c | 20 66 74 79 70 65 2c 20 |e(suite,| ftype, |
|00000c50| 66 63 72 65 61 74 6f 72 | 2c 20 63 6f 6f 6b 69 65 |fcreator|, cookie|
|00000c60| 2c 20 6b 4c 61 72 67 65 | 34 42 69 74 49 63 6f 6e |, kLarge|4BitIcon|
|00000c70| 2c 20 6c 61 72 67 65 34 | 42 69 74 44 61 74 61 29 |, large4|BitData)|
|00000c80| 3b 0d 09 09 09 09 6a 75 | 6e 6b 20 3a 3d 20 47 65 |;.....ju|nk := Ge|
|00000c90| 74 44 54 44 42 41 64 64 | 53 75 69 74 65 28 73 75 |tDTDBAdd|Suite(su|
|00000ca0| 69 74 65 2c 20 66 74 79 | 70 65 2c 20 66 63 72 65 |ite, fty|pe, fcre|
|00000cb0| 61 74 6f 72 2c 20 63 6f | 6f 6b 69 65 2c 20 6b 4c |ator, co|okie, kL|
|00000cc0| 61 72 67 65 38 42 69 74 | 49 63 6f 6e 2c 20 6c 61 |arge8Bit|Icon, la|
|00000cd0| 72 67 65 38 42 69 74 44 | 61 74 61 29 3b 0d 09 09 |rge8BitD|ata);...|
|00000ce0| 09 65 6e 64 20 65 6c 73 | 65 20 62 65 67 69 6e 0d |.end els|e begin.|
|00000cf0| 09 09 09 09 65 72 72 20 | 3a 3d 20 61 66 70 49 74 |....err |:= afpIt|
|00000d00| 65 6d 4e 6f 74 46 6f 75 | 6e 64 3b 0d 09 09 09 65 |emNotFou|nd;....e|
|00000d10| 6e 64 3b 20 28 2a 20 69 | 66 20 2a 29 0d 09 09 65 |nd; (* i|f *)...e|
|00000d20| 6e 64 3b 20 28 2a 20 69 | 66 20 2a 29 0d 09 09 69 |nd; (* i|f *)...i|
|00000d30| 66 20 65 72 72 20 3c 3e | 20 6e 6f 45 72 72 20 74 |f err <>| noErr t|
|00000d40| 68 65 6e 20 62 65 67 69 | 6e 0d 09 09 09 69 66 20 |hen begi|n....if |
|00000d50| 73 75 69 74 65 20 3c 3e | 20 6e 69 6c 20 74 68 65 |suite <>| nil the|
|00000d60| 6e 20 62 65 67 69 6e 0d | 09 09 09 09 6a 75 6e 6b |n begin.|....junk|
|00000d70| 20 3a 3d 20 44 69 73 70 | 6f 73 65 49 63 6f 6e 53 | := Disp|oseIconS|
|00000d80| 75 69 74 65 28 73 75 69 | 74 65 2c 20 74 72 75 65 |uite(sui|te, true|
|00000d90| 29 3b 0d 09 09 09 09 73 | 75 69 74 65 20 3a 3d 20 |);.....s|uite := |
|00000da0| 6e 69 6c 3b 0d 09 09 09 | 65 6e 64 3b 20 28 2a 20 |nil;....|end; (* |
|00000db0| 69 66 20 2a 29 0d 09 09 | 65 6e 64 3b 20 28 2a 20 |if *)...|end; (* |
|00000dc0| 69 66 20 2a 29 0d 09 09 | 47 65 74 44 54 44 42 49 |if *)...|GetDTDBI|
|00000dd0| 63 6f 6e 53 75 69 74 65 | 55 6e 63 61 63 68 65 64 |conSuite|Uncached|
|00000de0| 20 3a 3d 20 65 72 72 3b | 0d 09 65 6e 64 3b 20 28 | := err;|..end; (|
|00000df0| 2a 20 47 65 74 44 54 44 | 42 49 63 6f 6e 53 75 69 |* GetDTD|BIconSui|
|00000e00| 74 65 55 6e 63 61 63 68 | 65 64 20 2a 29 0d 0d 09 |teUncach|ed *)...|
|00000e10| 63 6f 6e 73 74 0d 09 09 | 63 61 63 68 65 5f 6d 61 |const...|cache_ma|
|00000e20| 78 20 3d 20 32 30 3b 0d | 0d 09 74 79 70 65 0d 09 |x = 20;.|..type..|
|00000e30| 09 43 61 63 68 65 52 65 | 63 6f 72 64 20 3d 20 72 |.CacheRe|cord = r|
|00000e40| 65 63 6f 72 64 0d 09 09 | 09 09 75 73 61 67 65 3a |ecord...|..usage:|
|00000e50| 20 6c 6f 6e 67 49 6e 74 | 3b 0d 09 09 09 09 66 74 | longInt|;.....ft|
|00000e60| 79 70 65 2c 20 66 63 72 | 65 61 74 6f 72 3a 20 4f |ype, fcr|eator: O|
|00000e70| 53 54 79 70 65 3b 0d 09 | 09 09 09 73 75 69 74 65 |SType;..|...suite|
|00000e80| 3a 20 68 61 6e 64 6c 65 | 3b 0d 09 09 09 65 6e 64 |: handle|;....end|
|00000e90| 3b 0d 0d 09 76 61 72 0d | 09 09 63 61 63 68 65 3a |;...var.|..cache:|
|00000ea0| 20 61 72 72 61 79 5b 31 | 2e 2e 63 61 63 68 65 5f | array[1|..cache_|
|00000eb0| 6d 61 78 5d 20 6f 66 20 | 43 61 63 68 65 52 65 63 |max] of |CacheRec|
|00000ec0| 6f 72 64 3b 0d 09 09 75 | 73 61 67 65 3a 20 6c 6f |ord;...u|sage: lo|
|00000ed0| 6e 67 49 6e 74 3b 0d 09 | 09 64 65 66 61 75 6c 74 |ngInt;..|.default|
|00000ee0| 5f 61 70 70 6c 69 63 61 | 74 69 6f 6e 5f 73 75 69 |_applica|tion_sui|
|00000ef0| 74 65 3a 20 68 61 6e 64 | 6c 65 3b 0d 09 09 64 65 |te: hand|le;...de|
|00000f00| 66 61 75 6c 74 5f 64 6f | 63 75 6d 65 6e 74 5f 73 |fault_do|cument_s|
|00000f10| 75 69 74 65 3a 20 68 61 | 6e 64 6c 65 3b 0d 0d 09 |uite: ha|ndle;...|
|00000f20| 66 75 6e 63 74 69 6f 6e | 20 47 65 74 44 54 44 42 |function| GetDTDB|
|00000f30| 49 63 6f 6e 53 75 69 74 | 65 43 61 63 68 65 64 20 |IconSuit|eCached |
|00000f40| 28 66 74 79 70 65 2c 20 | 66 63 72 65 61 74 6f 72 |(ftype, |fcreator|
|00000f50| 3a 20 4f 53 54 79 70 65 | 3b 20 76 61 72 20 73 75 |: OSType|; var su|
|00000f60| 69 74 65 3a 20 48 61 6e | 64 6c 65 29 3a 20 4f 53 |ite: Han|dle): OS|
|00000f70| 45 72 72 3b 0d 09 09 76 | 61 72 0d 09 09 09 65 72 |Err;...v|ar....er|
|00000f80| 72 2c 20 6a 75 6e 6b 3a | 20 4f 53 45 72 72 3b 0d |r, junk:| OSErr;.|
|00000f90| 09 09 09 69 2c 20 6a 3a | 20 69 6e 74 65 67 65 72 |...i, j:| integer|
|00000fa0| 3b 0d 09 09 09 6d 3a 20 | 6c 6f 6e 67 49 6e 74 3b |;....m: |longInt;|
|00000fb0| 0d 09 62 65 67 69 6e 0d | 09 09 65 72 72 20 3a 3d |..begin.|..err :=|
|00000fc0| 20 2d 31 3b 0d 09 09 73 | 75 69 74 65 20 3a 3d 20 | -1;...s|uite := |
|00000fd0| 6e 69 6c 3b 0d 09 09 66 | 6f 72 20 69 20 3a 3d 20 |nil;...f|or i := |
|00000fe0| 31 20 74 6f 20 63 61 63 | 68 65 5f 6d 61 78 20 64 |1 to cac|he_max d|
|00000ff0| 6f 20 62 65 67 69 6e 0d | 09 09 09 69 66 20 28 63 |o begin.|...if (c|
|00001000| 61 63 68 65 5b 69 5d 2e | 75 73 61 67 65 20 3e 20 |ache[i].|usage > |
|00001010| 30 29 20 26 20 28 63 61 | 63 68 65 5b 69 5d 2e 66 |0) & (ca|che[i].f|
|00001020| 74 79 70 65 20 3d 20 66 | 74 79 70 65 29 20 26 20 |type = f|type) & |
|00001030| 28 63 61 63 68 65 5b 69 | 5d 2e 66 63 72 65 61 74 |(cache[i|].fcreat|
|00001040| 6f 72 20 3d 20 66 63 72 | 65 61 74 6f 72 29 20 74 |or = fcr|eator) t|
|00001050| 68 65 6e 20 62 65 67 69 | 6e 0d 09 09 09 09 73 75 |hen begi|n.....su|
|00001060| 69 74 65 20 3a 3d 20 63 | 61 63 68 65 5b 69 5d 2e |ite := c|ache[i].|
|00001070| 73 75 69 74 65 3b 0d 09 | 09 09 09 65 72 72 20 3a |suite;..|...err :|
|00001080| 3d 20 6e 6f 45 72 72 3b | 0d 09 09 09 09 63 61 63 |= noErr;|.....cac|
|00001090| 68 65 5b 69 5d 2e 75 73 | 61 67 65 20 3a 3d 20 75 |he[i].us|age := u|
|000010a0| 73 61 67 65 3b 0d 09 09 | 09 09 75 73 61 67 65 20 |sage;...|..usage |
|000010b0| 3a 3d 20 75 73 61 67 65 | 20 2b 20 31 3b 0d 09 09 |:= usage| + 1;...|
|000010c0| 09 09 6c 65 61 76 65 3b | 0d 09 09 09 65 6e 64 3b |..leave;|....end;|
|000010d0| 0d 09 09 65 6e 64 3b 0d | 09 09 69 66 20 65 72 72 |...end;.|..if err|
|000010e0| 20 3c 3e 20 6e 6f 45 72 | 72 20 74 68 65 6e 20 62 | <> noEr|r then b|
|000010f0| 65 67 69 6e 0d 09 09 09 | 6d 20 3a 3d 20 6d 61 78 |egin....|m := max|
|00001100| 4c 6f 6e 67 49 6e 74 3b | 0d 09 09 09 66 6f 72 20 |LongInt;|....for |
|00001110| 69 20 3a 3d 20 31 20 74 | 6f 20 63 61 63 68 65 5f |i := 1 t|o cache_|
|00001120| 6d 61 78 20 64 6f 20 62 | 65 67 69 6e 0d 09 09 09 |max do b|egin....|
|00001130| 09 69 66 20 28 63 61 63 | 68 65 5b 69 5d 2e 75 73 |.if (cac|he[i].us|
|00001140| 61 67 65 20 3c 20 6d 29 | 20 74 68 65 6e 20 62 65 |age < m)| then be|
|00001150| 67 69 6e 0d 09 09 09 09 | 09 6a 20 3a 3d 20 69 3b |gin.....|.j := i;|
|00001160| 0d 09 09 09 09 09 6d 20 | 3a 3d 20 63 61 63 68 65 |......m |:= cache|
|00001170| 5b 69 5d 2e 75 73 61 67 | 65 3b 0d 09 09 09 09 65 |[i].usag|e;.....e|
|00001180| 6e 64 3b 0d 09 09 09 65 | 6e 64 3b 0d 09 09 09 65 |nd;....e|nd;....e|
|00001190| 72 72 20 3a 3d 20 47 65 | 74 44 54 44 42 49 63 6f |rr := Ge|tDTDBIco|
|000011a0| 6e 53 75 69 74 65 55 6e | 63 61 63 68 65 64 28 66 |nSuiteUn|cached(f|
|000011b0| 74 79 70 65 2c 20 66 63 | 72 65 61 74 6f 72 2c 20 |type, fc|reator, |
|000011c0| 73 75 69 74 65 29 3b 0d | 09 09 09 69 66 20 65 72 |suite);.|...if er|
|000011d0| 72 20 3d 20 6e 6f 45 72 | 72 20 74 68 65 6e 20 62 |r = noEr|r then b|
|000011e0| 65 67 69 6e 0d 09 09 09 | 09 69 66 20 6d 20 3e 20 |egin....|.if m > |
|000011f0| 30 20 74 68 65 6e 20 62 | 65 67 69 6e 0d 09 09 09 |0 then b|egin....|
|00001200| 09 09 6a 75 6e 6b 20 3a | 3d 20 44 69 73 70 6f 73 |..junk :|= Dispos|
|00001210| 65 49 63 6f 6e 53 75 69 | 74 65 28 63 61 63 68 65 |eIconSui|te(cache|
|00001220| 5b 6a 5d 2e 73 75 69 74 | 65 2c 20 74 72 75 65 29 |[j].suit|e, true)|
|00001230| 3b 0d 09 09 09 09 65 6e | 64 3b 0d 09 09 09 09 63 |;.....en|d;.....c|
|00001240| 61 63 68 65 5b 6a 5d 2e | 73 75 69 74 65 20 3a 3d |ache[j].|suite :=|
|00001250| 20 73 75 69 74 65 3b 0d | 09 09 09 09 63 61 63 68 | suite;.|....cach|
|00001260| 65 5b 6a 5d 2e 66 74 79 | 70 65 20 3a 3d 20 66 74 |e[j].fty|pe := ft|
|00001270| 79 70 65 3b 0d 09 09 09 | 09 63 61 63 68 65 5b 6a |ype;....|.cache[j|
|00001280| 5d 2e 66 63 72 65 61 74 | 6f 72 20 3a 3d 20 66 63 |].fcreat|or := fc|
|00001290| 72 65 61 74 6f 72 3b 0d | 09 09 09 09 63 61 63 68 |reator;.|....cach|
|000012a0| 65 5b 6a 5d 2e 75 73 61 | 67 65 20 3a 3d 20 75 73 |e[j].usa|ge := us|
|000012b0| 61 67 65 3b 0d 09 09 09 | 09 75 73 61 67 65 20 3a |age;....|.usage :|
|000012c0| 3d 20 75 73 61 67 65 20 | 2b 20 31 3b 0d 09 09 09 |= usage |+ 1;....|
|000012d0| 65 6e 64 3b 0d 09 09 65 | 6e 64 3b 0d 09 09 69 66 |end;...e|nd;...if|
|000012e0| 20 28 65 72 72 20 3d 20 | 6e 6f 45 72 72 29 20 26 | (err = |noErr) &|
|000012f0| 20 28 73 75 69 74 65 20 | 3d 20 6e 69 6c 29 20 74 | (suite |= nil) t|
|00001300| 68 65 6e 20 62 65 67 69 | 6e 0d 09 09 09 65 72 72 |hen begi|n....err|
|00001310| 20 3a 3d 20 72 65 73 4e | 6f 74 46 6f 75 6e 64 3b | := resN|otFound;|
|00001320| 0d 09 09 65 6e 64 3b 0d | 09 09 69 66 20 28 65 72 |...end;.|..if (er|
|00001330| 72 20 3c 3e 20 6e 6f 45 | 72 72 29 20 74 68 65 6e |r <> noE|rr) then|
|00001340| 20 62 65 67 69 6e 0d 09 | 09 09 73 75 69 74 65 20 | begin..|..suite |
|00001350| 3a 3d 20 64 65 66 61 75 | 6c 74 5f 64 6f 63 75 6d |:= defau|lt_docum|
|00001360| 65 6e 74 5f 73 75 69 74 | 65 3b 0d 09 09 09 69 66 |ent_suit|e;....if|
|00001370| 20 28 66 74 79 70 65 20 | 3d 20 27 41 50 50 4c 27 | (ftype |= 'APPL'|
|00001380| 29 20 26 20 28 64 65 66 | 61 75 6c 74 5f 61 70 70 |) & (def|ault_app|
|00001390| 6c 69 63 61 74 69 6f 6e | 5f 73 75 69 74 65 20 3c |lication|_suite <|
|000013a0| 3e 20 6e 69 6c 29 20 74 | 68 65 6e 20 62 65 67 69 |> nil) t|hen begi|
|000013b0| 6e 0d 09 09 09 09 73 75 | 69 74 65 20 3a 3d 20 64 |n.....su|ite := d|
|000013c0| 65 66 61 75 6c 74 5f 61 | 70 70 6c 69 63 61 74 69 |efault_a|pplicati|
|000013d0| 6f 6e 5f 73 75 69 74 65 | 3b 0d 09 09 09 65 6e 64 |on_suite|;....end|
|000013e0| 3b 0d 09 09 65 6e 64 3b | 0d 09 09 47 65 74 44 54 |;...end;|...GetDT|
|000013f0| 44 42 49 63 6f 6e 53 75 | 69 74 65 43 61 63 68 65 |DBIconSu|iteCache|
|00001400| 64 20 3a 3d 20 65 72 72 | 3b 0d 09 65 6e 64 3b 0d |d := err|;..end;.|
|00001410| 0d 09 70 72 6f 63 65 64 | 75 72 65 20 49 6e 69 74 |..proced|ure Init|
|00001420| 49 43 49 63 6f 6e 53 75 | 69 74 65 73 3b 0d 09 09 |ICIconSu|ites;...|
|00001430| 76 61 72 0d 09 09 09 69 | 3a 20 69 6e 74 65 67 65 |var....i|: intege|
|00001440| 72 3b 0d 09 62 65 67 69 | 6e 0d 09 09 66 6f 72 20 |r;..begi|n...for |
|00001450| 69 20 3a 3d 20 31 20 74 | 6f 20 63 61 63 68 65 5f |i := 1 t|o cache_|
|00001460| 6d 61 78 20 64 6f 20 62 | 65 67 69 6e 0d 09 09 09 |max do b|egin....|
|00001470| 63 61 63 68 65 5b 69 5d | 2e 75 73 61 67 65 20 3a |cache[i]|.usage :|
|00001480| 3d 20 2d 31 3b 0d 09 09 | 65 6e 64 3b 0d 09 09 75 |= -1;...|end;...u|
|00001490| 73 61 67 65 20 3a 3d 20 | 31 3b 0d 09 09 64 65 66 |sage := |1;...def|
|000014a0| 61 75 6c 74 5f 61 70 70 | 6c 69 63 61 74 69 6f 6e |ault_app|lication|
|000014b0| 5f 73 75 69 74 65 20 3a | 3d 20 6e 69 6c 3b 0d 09 |_suite :|= nil;..|
|000014c0| 09 64 65 66 61 75 6c 74 | 5f 64 6f 63 75 6d 65 6e |.default|_documen|
|000014d0| 74 5f 73 75 69 74 65 20 | 3a 3d 20 6e 69 6c 3b 0d |t_suite |:= nil;.|
|000014e0| 09 09 69 66 20 73 79 73 | 74 65 6d 37 20 74 68 65 |..if sys|tem7 the|
|000014f0| 6e 20 62 65 67 69 6e 0d | 09 09 09 69 66 20 47 65 |n begin.|...if Ge|
|00001500| 74 49 63 6f 6e 53 75 69 | 74 65 28 64 65 66 61 75 |tIconSui|te(defau|
|00001510| 6c 74 5f 64 6f 63 75 6d | 65 6e 74 5f 73 75 69 74 |lt_docum|ent_suit|
|00001520| 65 2c 20 2d 34 30 30 30 | 2c 20 73 76 41 6c 6c 4c |e, -4000|, svAllL|
|00001530| 61 72 67 65 44 61 74 61 | 29 20 3c 3e 20 6e 6f 45 |argeData|) <> noE|
|00001540| 72 72 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 09 09 |rr then |begin...|
|00001550| 09 09 64 65 66 61 75 6c | 74 5f 64 6f 63 75 6d 65 |..defaul|t_docume|
|00001560| 6e 74 5f 73 75 69 74 65 | 20 3a 3d 20 6e 69 6c 3b |nt_suite| := nil;|
|00001570| 0d 09 09 09 65 6e 64 3b | 20 28 2a 20 69 66 20 2a |....end;| (* if *|
|00001580| 29 0d 09 09 09 69 66 20 | 47 65 74 49 63 6f 6e 53 |)....if |GetIconS|
|00001590| 75 69 74 65 28 64 65 66 | 61 75 6c 74 5f 61 70 70 |uite(def|ault_app|
|000015a0| 6c 69 63 61 74 69 6f 6e | 5f 73 75 69 74 65 2c 20 |lication|_suite, |
|000015b0| 2d 33 39 39 36 2c 20 73 | 76 41 6c 6c 4c 61 72 67 |-3996, s|vAllLarg|
|000015c0| 65 44 61 74 61 29 20 3c | 3e 20 6e 6f 45 72 72 20 |eData) <|> noErr |
|000015d0| 74 68 65 6e 20 62 65 67 | 69 6e 0d 09 09 09 09 64 |then beg|in.....d|
|000015e0| 65 66 61 75 6c 74 5f 61 | 70 70 6c 69 63 61 74 69 |efault_a|pplicati|
|000015f0| 6f 6e 5f 73 75 69 74 65 | 20 3a 3d 20 6e 69 6c 3b |on_suite| := nil;|
|00001600| 0d 09 09 09 65 6e 64 3b | 20 28 2a 20 69 66 20 2a |....end;| (* if *|
|00001610| 29 0d 09 09 65 6e 64 3b | 20 28 2a 20 69 66 20 2a |)...end;| (* if *|
|00001620| 29 0d 09 65 6e 64 3b 0d | 0d 65 6e 64 2e 00 00 00 |)..end;.|.end....|
|00001630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001680| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00001690| 29 54 d5 57 14 64 88 21 | c0 00 00 e0 29 11 88 44 |)T.W.d.!|....)..D|
|000016a0| 2a 1a 6f 6f 2d 51 a4 ef | 0e 2b ae c0 2d 30 a5 10 |*.oo-Q..|.+..-0..|
|000016b0| 0e 49 43 49 63 6f 6e 53 | 75 69 74 65 73 2e 70 49 |.ICIconS|uites.pI|
|000016c0| 02 00 00 00 54 45 58 54 | 43 57 49 45 00 00 00 9c |....TEXT|CWIE....|
|000016d0| 00 00 54 45 58 54 43 57 | 49 45 00 00 00 9c 00 80 |..TEXTCW|IE......|
|000016e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016f0| 00 00 aa af 7c 33 00 00 | 15 ad 00 00 01 9a b1 56 |....|3..|.......V|
|00001700| 03 11 7d 5d 39 78 b5 54 | 40 00 f1 70 31 79 b1 57 |..}]9x.T|@..p1y.W|
|00001710| 14 d5 77 10 2e 1c a9 7a | 1b 06 45 16 4f 9f ae 5c |..w....z|..E.O..\|
|00001720| 6f 2f 2f 2b 5b df cf 9f | ab 2b 2e 00 63 bf c2 7c |o//+[...|.+..c..||
|00001730| fd fc f8 e4 4a 3f c1 fe | d4 51 04 40 a1 3e 1e 3e |....J?..|.Q.@.>.>|
|00001740| 3e b6 1e 40 05 00 7f 4b | 7f ae 5e 06 06 07 1b 57 |>..@...K|..^....W|
|00001750| ff cf bf 05 11 5d 1f 5b | df d3 bf d4 55 51 40 5b |.....].[|....UQ@[|
|00001760| ff d7 bf 55 7d 57 00 5b | bf d7 bf 00 c0 0c 00 57 |...U}W.[|.......W|
|00001770| 9f ca ff f9 f8 fd f9 46 | 5e b1 98 90 90 95 d7 46 |.......F|^......F|
|00001780| 00 00 00 48 00 09 47 65 | 6e 65 76 61 00 00 00 00 |...H..Ge|neva....|
|00001790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017a0| 00 00 00 00 00 00 00 03 | 00 02 00 3e 00 0a 01 d7 |........|...>....|
|000017b0| 02 80 00 3e 00 0a 01 d7 | 02 80 ae 0e bf 8b 00 00 |...>....|........|
|000017c0| 06 07 00 00 06 0d 00 00 | 04 ff 01 00 00 00 00 04 |........|........|
|000017d0| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|000017e0| 00 00 00 46 00 65 49 d0 | 12 5e 00 00 00 1c 00 46 |...F.eI.|.^.....F|
|000017f0| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00001800| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00001810| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00001820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+